home *** CD-ROM | disk | FTP | other *** search
- // Borland C++ Builder
- // Copyright (c) 1995, 1998 by Borland International
- // All rights reserved
-
- // (DO NOT EDIT: machine generated header) 'AHMTDriveVolume.pas' rev: 3.00
-
- #ifndef AHMTDriveVolumeHPP
- #define AHMTDriveVolumeHPP
- #include <AHMSystem.hpp>
- #include <Classes.hpp>
- #include <SysUtils.hpp>
- #include <Messages.hpp>
- #include <Windows.hpp>
- #include <SysInit.hpp>
- #include <System.hpp>
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Ahmtdrivevolume
- {
- //-- type declarations -------------------------------------------------------
- typedef void __fastcall (__closure *TAHMOnDriveVolumeError)(int ErrorNumber);
-
- class DELPHICLASS TAHMDriveVolume;
- class PASCALIMPLEMENTATION TAHMDriveVolume : public Ahmsystem::TAHMSystemsComponent
- {
- typedef Ahmsystem::TAHMSystemsComponent inherited;
-
- private:
- bool fcasepreserved;
- bool fcasesensitive;
- bool fstoredUni;
- bool fpersistent;
- bool ffilecompression;
- bool fvolcompressed;
- System::AnsiString fvollabel;
- System::AnsiString fvolSerialNum;
- System::AnsiString ffilesystemname;
- int ffilesystemflag;
- char FDrive;
- TAHMOnDriveVolumeError FErrorEvent;
- Classes::TNotifyEvent fbeforeupdate;
- Classes::TNotifyEvent fafterupdate;
- void __fastcall UpdateBoolInfo(bool value);
- void __fastcall UpdateStringInfo(System::AnsiString value);
- void __fastcall UpdateIntegerInfo(int value);
- void __fastcall SetDrive(char DriveLetter);
-
- protected:
- void __fastcall ProcessError(const System::Variant &Result);
- System::AnsiString __fastcall GetVolumeLabel(void);
- System::AnsiString __fastcall GetVolumeSerialNumber(void);
- System::AnsiString __fastcall GetVolumeFileSystemName(void);
- int __fastcall GetVolumeFileSystemFlags(void);
-
- public:
- __fastcall virtual TAHMDriveVolume(Classes::TComponent* AComponent);
- void __fastcall UpdateAll(void);
-
- __published:
- __property bool VolumeIsCompressed = {read=fvolcompressed, write=UpdateBoolInfo, stored=false, nodefault
- };
- __property bool CasePreserved = {read=fcasepreserved, write=UpdateBoolInfo, stored=false, nodefault
- };
- __property bool CaseSensitive = {read=fcasesensitive, write=UpdateBoolInfo, stored=false, nodefault
- };
- __property bool StoredUniCodeOnDisk = {read=fstoredUni, write=UpdateBoolInfo, stored=false, nodefault
- };
- __property bool PersistentACLS = {read=fpersistent, write=UpdateBoolInfo, stored=false, nodefault};
-
- __property bool FileCompression = {read=ffilecompression, write=UpdateBoolInfo, stored=false, nodefault
- };
- __property System::AnsiString VolumeLabel = {read=fvollabel, write=UpdateStringInfo, stored=false};
-
- __property System::AnsiString SerialNumber = {read=fvolSerialNum, write=UpdateStringInfo, stored=false
- };
- __property System::AnsiString FileSystemName = {read=ffilesystemname, write=UpdateStringInfo, stored=false
- };
- __property int FileSystemFlags = {read=ffilesystemflag, write=UpdateIntegerInfo, stored=false, nodefault
- };
- __property char CurrentDrive = {read=FDrive, write=SetDrive, stored=false, nodefault};
- __property Classes::TNotifyEvent AfterUpdate = {read=fafterupdate, write=fafterupdate};
- __property Classes::TNotifyEvent BeforeUpdate = {read=fbeforeupdate, write=fbeforeupdate};
- __property TAHMOnDriveVolumeError OnError = {read=FErrorEvent, write=FErrorEvent};
- public:
- /* TComponent.Destroy */ __fastcall virtual ~TAHMDriveVolume(void) { }
-
- };
-
- //-- var, const, procedure ---------------------------------------------------
-
- } /* namespace Ahmtdrivevolume */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Ahmtdrivevolume;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // AHMTDriveVolume
-